home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet bezpieczenstwa / mini Pentoo LiveCD 2006.1 / mpentoo-2006.1.iso / modules / nessus-2.2.8.mo / usr / lib / nessus / plugins / vbulletin_detect.nasl < prev    next >
Text File  |  2005-03-31  |  2KB  |  67 lines

  1. #
  2. #  This script was written by David Maciejak <david dot maciejak at kyxar dot fr>
  3. #  This script is released under the GNU GPL v2
  4. #
  5.  
  6. if(description)
  7. {
  8.  script_id(17282);
  9.  script_version ("$Revision: 1.1 $");
  10.  
  11.  name["english"] = "vBulletin Detection";
  12.  
  13.  script_name(english:name["english"]);
  14.  
  15.  desc["english"] = "
  16. This script detects whether vBulletin discussion forum is running 
  17. on the remote host, and extracts its version if it is.
  18.  
  19. Risk factor : None";
  20.  
  21.  script_description(english:desc["english"]);
  22.  
  23.  summary["english"] = "Checks for the presence of vBulletin";
  24.  
  25.  script_summary(english:summary["english"], francais:summary["francais"]);
  26.  
  27.  script_category(ACT_GATHER_INFO);
  28.  
  29.  script_copyright(english:"This script is Copyright (C) 2005 David Maciejak");
  30.  family["english"] = "CGI abuses";
  31.  script_family(english:family["english"]);
  32.  script_dependencie("find_service.nes", "http_version.nasl");
  33.  script_require_ports("Services/www", 80);
  34.  exit(0);
  35. }
  36.  
  37. #
  38. # The script code starts here
  39. #
  40.  
  41. include("http_func.inc");
  42. include("http_keepalive.inc");
  43.  
  44. port = get_http_port(default:80);
  45.  
  46. if(!get_port_state(port))exit(0);
  47. if(!can_host_php(port:port)) exit(0);
  48.  
  49.  
  50. foreach d (make_list("/forum", cgi_dirs()))
  51. {
  52.  req = http_get(item:string(d, "/index.php"), port:port);
  53.  res = http_keepalive_send_recv(port:port, data:req);
  54.  if( res == NULL ) exit(0);
  55.  res = egrep(pattern:" content=.vBulletin ", string:res, icase:TRUE);
  56.  if( res )
  57.  {
  58.   vers = ereg_replace(pattern:".*vBulletin ([0-9.]+).*", string:res, replace:"\1", icase:TRUE);
  59.   set_kb_item(name:string("www/", port, "/vBulletin"),
  60.             value:string(vers," under ",d));
  61.           
  62.   rep = "The remote host is running vBulletin " + vers + " under " + d;
  63.   security_note(port:port, data:rep);
  64.   exit(0);     
  65.  }
  66.